home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / complib / dorgtr.z / dorgtr
Encoding:
Text File  |  1998-10-30  |  2.7 KB  |  133 lines
  1.  
  2.  
  3.  
  4. DDDDOOOORRRRGGGGTTTTRRRR((((3333FFFF))))                                                          DDDDOOOORRRRGGGGTTTTRRRR((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      DORGTR - generate a real orthogonal matrix Q which is defined as the
  10.      product of n-1 elementary reflectors of order N, as returned by DSYTRD
  11.  
  12. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  13.      SUBROUTINE DORGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO )
  14.  
  15.          CHARACTER      UPLO
  16.  
  17.          INTEGER        INFO, LDA, LWORK, N
  18.  
  19.          DOUBLE         PRECISION A( LDA, * ), TAU( * ), WORK( LWORK )
  20.  
  21. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  22.      DORGTR generates a real orthogonal matrix Q which is defined as the
  23.      product of n-1 elementary reflectors of order N, as returned by DSYTRD:
  24.  
  25.      if UPLO = 'U', Q = H(n-1) . . . H(2) H(1),
  26.  
  27.      if UPLO = 'L', Q = H(1) H(2) . . . H(n-1).
  28.  
  29.  
  30. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  31.      UPLO    (input) CHARACTER*1
  32.              = 'U': Upper triangle of A contains elementary reflectors from
  33.              DSYTRD; = 'L': Lower triangle of A contains elementary reflectors
  34.              from DSYTRD.
  35.  
  36.      N       (input) INTEGER
  37.              The order of the matrix Q. N >= 0.
  38.  
  39.      A       (input/output) DOUBLE PRECISION array, dimension (LDA,N)
  40.              On entry, the vectors which define the elementary reflectors, as
  41.              returned by DSYTRD.  On exit, the N-by-N orthogonal matrix Q.
  42.  
  43.      LDA     (input) INTEGER
  44.              The leading dimension of the array A. LDA >= max(1,N).
  45.  
  46.      TAU     (input) DOUBLE PRECISION array, dimension (N-1)
  47.              TAU(i) must contain the scalar factor of the elementary reflector
  48.              H(i), as returned by DSYTRD.
  49.  
  50.      WORK    (workspace/output) DOUBLE PRECISION array, dimension (LWORK)
  51.              On exit, if INFO = 0, WORK(1) returns the optimal LWORK.
  52.  
  53.      LWORK   (input) INTEGER
  54.              The dimension of the array WORK. LWORK >= max(1,N-1).  For
  55.              optimum performance LWORK >= (N-1)*NB, where NB is the optimal
  56.              blocksize.
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. DDDDOOOORRRRGGGGTTTTRRRR((((3333FFFF))))                                                          DDDDOOOORRRRGGGGTTTTRRRR((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      INFO    (output) INTEGER
  75.              = 0:  successful exit
  76.              < 0:  if INFO = -i, the i-th argument had an illegal value
  77.  
  78.  
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.